/*
 * Copyright (c) 2011-2021 Technosoftware GmbH. All rights reserved
 * Web: https://technosoftware.com
 *
 * Purpose:
 * Definition of the Windows1250Encoding class.
 *
 * Based on: POCO C++ Foundation Library
 *           Copyright (c) 2005-2007, Applied Informatics Software Engineering GmbH.
 *           and Contributors.
 *
 * The source code in this file is covered under a dual-license scenario:
 *   - Owner of a purchased license: SCLA 1.0
 *   - GPL V3: everybody else
 *
 * SCLA license terms accompanied with this source code.
 * See SCLA 1.0: https://technosoftware.com/license/Source_Code_License_Agreement.pdf
 *
 * GNU General Public License as published by the Free Software Foundation;
 * version 3 of the License are accompanied with this source code.
 * See https://technosoftware.com/license/GPLv3License.txt
 *
 * This source code is distributed in the hope that it will be useful, but
 * WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY
 * or FITNESS FOR A PARTICULAR PURPOSE.
 */

#include "Base/Windows1250Encoding.h"
#include "Base/String.h"

namespace Technosoftware
{
    namespace Base
    {
        const char* Windows1250Encoding::names_[] =
        {
            "windows-1250",
            "Windows-1250",
            "cp1250",
            "CP1250",
            NULL
        };


        const TextEncoding::CharacterMap Windows1250Encoding::charMap_ =
        {
            /*          00      01      02      03      04      05      06      07      08      09      0a      0b      0c      0d      0e      0f   */
            /* 00 */    0x0000, 0x0001, 0x0002, 0x0003, 0x0004, 0x0005, 0x0006, 0x0007, 0x0008, 0x0009, 0x000a, 0x000b, 0x000c, 0x000d, 0x000e, 0x000f,
            /* 10 */    0x0010, 0x0011, 0x0012, 0x0013, 0x0014, 0x0015, 0x0016, 0x0017, 0x0018, 0x0019, 0x001a, 0x001b, 0x001c, 0x001d, 0x001e, 0x001f,
            /* 20 */    0x0020, 0x0021, 0x0022, 0x0023, 0x0024, 0x0025, 0x0026, 0x0027, 0x0028, 0x0029, 0x002a, 0x002b, 0x002c, 0x002d, 0x002e, 0x002f,
            /* 30 */    0x0030, 0x0031, 0x0032, 0x0033, 0x0034, 0x0035, 0x0036, 0x0037, 0x0038, 0x0039, 0x003a, 0x003b, 0x003c, 0x003d, 0x003e, 0x003f,
            /* 40 */    0x0040, 0x0041, 0x0042, 0x0043, 0x0044, 0x0045, 0x0046, 0x0047, 0x0048, 0x0049, 0x004a, 0x004b, 0x004c, 0x004d, 0x004e, 0x004f,
            /* 50 */    0x0050, 0x0051, 0x0052, 0x0053, 0x0054, 0x0055, 0x0056, 0x0057, 0x0058, 0x0059, 0x005a, 0x005b, 0x005c, 0x005d, 0x005e, 0x005f,
            /* 60 */    0x0060, 0x0061, 0x0062, 0x0063, 0x0064, 0x0065, 0x0066, 0x0067, 0x0068, 0x0069, 0x006a, 0x006b, 0x006c, 0x006d, 0x006e, 0x006f,
            /* 70 */    0x0070, 0x0071, 0x0072, 0x0073, 0x0074, 0x0075, 0x0076, 0x0077, 0x0078, 0x0079, 0x007a, 0x007b, 0x007c, 0x007d, 0x007e, 0x007f,
            /* 80 */    0x20ac, 0xfffe, 0x201a, 0xfffe, 0x201e, 0x2026, 0x2020, 0x2021, 0xfffe, 0x2030, 0x0160, 0x2039, 0x015a, 0x0164, 0x017d, 0x0179,
            /* 90 */    0xfffe, 0x2018, 0x2019, 0x201c, 0x201d, 0x2022, 0x2013, 0x2014, 0xfffe, 0x2122, 0x0161, 0x203a, 0x015b, 0x0165, 0x017e, 0x017a,
            /* a0 */    0x00a0, 0x02c7, 0x02d8, 0x0141, 0x00a4, 0x0104, 0x00a6, 0x00a7, 0x00a8, 0x00a9, 0x015e, 0x00ab, 0x00ac, 0x00ad, 0x00ae, 0x017b,
            /* b0 */    0x00b0, 0x00b1, 0x02db, 0x0142, 0x00b4, 0x00b5, 0x00b6, 0x00b7, 0x00b8, 0x0105, 0x015f, 0x00bb, 0x013d, 0x02dd, 0x013e, 0x017c,
            /* c0 */    0x0154, 0x00c1, 0x00c2, 0x0102, 0x00c4, 0x0139, 0x0106, 0x00c7, 0x010c, 0x00c9, 0x0118, 0x00cb, 0x011a, 0x00cd, 0x00ce, 0x010e,
            /* d0 */    0x0110, 0x0143, 0x0147, 0x00d3, 0x00d4, 0x0150, 0x00d6, 0x00d7, 0x0158, 0x016e, 0x00da, 0x0170, 0x00dc, 0x00dd, 0x0162, 0x00df,
            /* e0 */    0x0155, 0x00e1, 0x00e2, 0x0103, 0x00e4, 0x013a, 0x0107, 0x00e7, 0x010d, 0x00e9, 0x0119, 0x00eb, 0x011b, 0x00ed, 0x00ee, 0x010f,
            /* f0 */    0x0111, 0x0144, 0x0148, 0x00f3, 0x00f4, 0x0151, 0x00f6, 0x00f7, 0x0159, 0x016f, 0x00fa, 0x0171, 0x00fc, 0x00fd, 0x0163, 0x02d9,
        };


        Windows1250Encoding::Windows1250Encoding()
        {
        }


        Windows1250Encoding::~Windows1250Encoding()
        {
        }


        const char* Windows1250Encoding::GetCanonicalName() const
        {
            return names_[0];
        }


        bool Windows1250Encoding::IsA(const std::string& encodingName) const
        {
            for (const char** name = names_; *name; ++name)
            {
                if (Base::CaseInsensitiveCompare(encodingName, *name) == 0)
                    return true;
            }
            return false;
        }


        const TextEncoding::CharacterMap& Windows1250Encoding::GetCharacterMap() const
        {
            return charMap_;
        }


        int Windows1250Encoding::Convert(const unsigned char* bytes) const
        {
            return charMap_[*bytes];
        }


        int Windows1250Encoding::Convert(int ch, unsigned char* bytes, int length) const
        {
            if (ch >= 0 && ch <= 255 && charMap_[ch] == ch)
            {
                if (bytes && length >= 1)
                    *bytes = (unsigned char)ch;
                return 1;
            }
            else switch (ch)
            {
            case 0x20ac: if (bytes && length >= 1) *bytes = 0x80; return 1;
            case 0x201a: if (bytes && length >= 1) *bytes = 0x82; return 1;
            case 0x201e: if (bytes && length >= 1) *bytes = 0x84; return 1;
            case 0x2026: if (bytes && length >= 1) *bytes = 0x85; return 1;
            case 0x2020: if (bytes && length >= 1) *bytes = 0x86; return 1;
            case 0x2021: if (bytes && length >= 1) *bytes = 0x87; return 1;
            case 0x2030: if (bytes && length >= 1) *bytes = 0x89; return 1;
            case 0x0160: if (bytes && length >= 1) *bytes = 0x8a; return 1;
            case 0x2039: if (bytes && length >= 1) *bytes = 0x8b; return 1;
            case 0x015a: if (bytes && length >= 1) *bytes = 0x8c; return 1;
            case 0x0164: if (bytes && length >= 1) *bytes = 0x8d; return 1;
            case 0x017d: if (bytes && length >= 1) *bytes = 0x8e; return 1;
            case 0x0179: if (bytes && length >= 1) *bytes = 0x8f; return 1;
            case 0x2018: if (bytes && length >= 1) *bytes = 0x91; return 1;
            case 0x2019: if (bytes && length >= 1) *bytes = 0x92; return 1;
            case 0x201c: if (bytes && length >= 1) *bytes = 0x93; return 1;
            case 0x201d: if (bytes && length >= 1) *bytes = 0x94; return 1;
            case 0x2022: if (bytes && length >= 1) *bytes = 0x95; return 1;
            case 0x2013: if (bytes && length >= 1) *bytes = 0x96; return 1;
            case 0x2014: if (bytes && length >= 1) *bytes = 0x97; return 1;
            case 0x2122: if (bytes && length >= 1) *bytes = 0x99; return 1;
            case 0x0161: if (bytes && length >= 1) *bytes = 0x9a; return 1;
            case 0x203a: if (bytes && length >= 1) *bytes = 0x9b; return 1;
            case 0x015b: if (bytes && length >= 1) *bytes = 0x9c; return 1;
            case 0x0165: if (bytes && length >= 1) *bytes = 0x9d; return 1;
            case 0x017e: if (bytes && length >= 1) *bytes = 0x9e; return 1;
            case 0x017a: if (bytes && length >= 1) *bytes = 0x9f; return 1;
            case 0x02c7: if (bytes && length >= 1) *bytes = 0xa1; return 1;
            case 0x02d8: if (bytes && length >= 1) *bytes = 0xa2; return 1;
            case 0x0141: if (bytes && length >= 1) *bytes = 0xa3; return 1;
            case 0x0104: if (bytes && length >= 1) *bytes = 0xa5; return 1;
            case 0x015e: if (bytes && length >= 1) *bytes = 0xaa; return 1;
            case 0x017b: if (bytes && length >= 1) *bytes = 0xaf; return 1;
            case 0x02db: if (bytes && length >= 1) *bytes = 0xb2; return 1;
            case 0x0142: if (bytes && length >= 1) *bytes = 0xb3; return 1;
            case 0x0105: if (bytes && length >= 1) *bytes = 0xb9; return 1;
            case 0x015f: if (bytes && length >= 1) *bytes = 0xba; return 1;
            case 0x013d: if (bytes && length >= 1) *bytes = 0xbc; return 1;
            case 0x02dd: if (bytes && length >= 1) *bytes = 0xbd; return 1;
            case 0x013e: if (bytes && length >= 1) *bytes = 0xbe; return 1;
            case 0x017c: if (bytes && length >= 1) *bytes = 0xbf; return 1;
            case 0x0154: if (bytes && length >= 1) *bytes = 0xc0; return 1;
            case 0x0102: if (bytes && length >= 1) *bytes = 0xc3; return 1;
            case 0x0139: if (bytes && length >= 1) *bytes = 0xc5; return 1;
            case 0x0106: if (bytes && length >= 1) *bytes = 0xc6; return 1;
            case 0x010c: if (bytes && length >= 1) *bytes = 0xc8; return 1;
            case 0x0118: if (bytes && length >= 1) *bytes = 0xca; return 1;
            case 0x011a: if (bytes && length >= 1) *bytes = 0xcc; return 1;
            case 0x010e: if (bytes && length >= 1) *bytes = 0xcf; return 1;
            case 0x0110: if (bytes && length >= 1) *bytes = 0xd0; return 1;
            case 0x0143: if (bytes && length >= 1) *bytes = 0xd1; return 1;
            case 0x0147: if (bytes && length >= 1) *bytes = 0xd2; return 1;
            case 0x0150: if (bytes && length >= 1) *bytes = 0xd5; return 1;
            case 0x0158: if (bytes && length >= 1) *bytes = 0xd8; return 1;
            case 0x016e: if (bytes && length >= 1) *bytes = 0xd9; return 1;
            case 0x0170: if (bytes && length >= 1) *bytes = 0xdb; return 1;
            case 0x0162: if (bytes && length >= 1) *bytes = 0xde; return 1;
            case 0x0155: if (bytes && length >= 1) *bytes = 0xe0; return 1;
            case 0x0103: if (bytes && length >= 1) *bytes = 0xe3; return 1;
            case 0x013a: if (bytes && length >= 1) *bytes = 0xe5; return 1;
            case 0x0107: if (bytes && length >= 1) *bytes = 0xe6; return 1;
            case 0x010d: if (bytes && length >= 1) *bytes = 0xe8; return 1;
            case 0x0119: if (bytes && length >= 1) *bytes = 0xea; return 1;
            case 0x011b: if (bytes && length >= 1) *bytes = 0xec; return 1;
            case 0x010f: if (bytes && length >= 1) *bytes = 0xef; return 1;
            case 0x0111: if (bytes && length >= 1) *bytes = 0xf0; return 1;
            case 0x0144: if (bytes && length >= 1) *bytes = 0xf1; return 1;
            case 0x0148: if (bytes && length >= 1) *bytes = 0xf2; return 1;
            case 0x0151: if (bytes && length >= 1) *bytes = 0xf5; return 1;
            case 0x0159: if (bytes && length >= 1) *bytes = 0xf8; return 1;
            case 0x016f: if (bytes && length >= 1) *bytes = 0xf9; return 1;
            case 0x0171: if (bytes && length >= 1) *bytes = 0xfb; return 1;
            case 0x0163: if (bytes && length >= 1) *bytes = 0xfe; return 1;
            default: return 0;
            }
        }


        int Windows1250Encoding::QueryConvert(const unsigned char* bytes, int length) const
        {
            if (1 <= length)
                return charMap_[*bytes];
            else
                return -1;
        }


        int Windows1250Encoding::GetSequenceLength(const unsigned char* bytes, int length) const
        {
            return 1;
        }

    }
}
